<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% '**************************************************************** '** 版权所有：烈火工作室 演示网站http://www.strongfire.cn ** '** QQ:839225572 邮箱：strongfire2008@163.com ** '** 非正版用户不得擅自非法修改用于商业用途！查出必究。 ** '**************************************************************** %> <% id=Request("id") %> 修改信息列表


管理员列表

<% Set rs=Server.CreateObject("ADODB.RecordSet") sql="select * from admin where id="&id rs.Open sql,conn,1,1 %>
修改密码
用户名：
<%=rs("user")%>
新密码：
<% rs.close set rs=nothing conn.close set conn=nothing %>